home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 033a / pns52.zip / COMMOPNS.MAC < prev    next >
Text File  |  1992-01-03  |  5KB  |  87 lines
  1.  ────────────────────────────────────────────────────────────────────────────
  2.  * * * BEGINNING OF PNS MACROS
  3.  
  4. ╔═════════════════════════════════════════════════════════════════════════════╗ pnsupproto
  5. ║                         Della & Muegge Enterprises'                         ║
  6. ║                          ┤ COMMOPNS Upload Menu ├                           ║
  7. ║                                                                             ║
  8. ║    Hot Key        Selection                     External Program            ║
  9. ╟─────────────────────────────────────────────────────────────────────────────╢
  10. ║    Ctrl-F1        Zmodem batch                  DSZ.COM                     ║ {GOTO PNSz}
  11. ║    Ctrl-F2        Ymodem batch or Ymodem-G      DSZ.COM                     ║ {GOTO PNSyb}
  12. ║    Ctrl-F3        MPt batch                     MPT.EXE                     ║ {GOTO PNSp}
  13. ║    Ctrl-F4        Xmodem-1K  (old Ymodem)       N/A     (Internal)          ║ {GOTO PNSxk}
  14. ║    Ctrl-F5        Xmodem                        N/A     (Internal)          ║ {GOTO PNSx}
  15. ║    Ctrl-F6        HS/Link batch                 HSLINK.EXE                  ║ {GOTO PNSh}
  16. ╟─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─╢ {:CPU} {MACRO pnsupproto}
  17. ║                   Edit PNS Macros                                           ║ {GOTO PNSEdit}
  18. ║                   Register PNS                                              ║ {GOTO PNSRegister}
  19. ║                                                                   Macros -> ║ ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
  20. ╚═════════════════════════════════════════════════════════════════════════════╝
  21. COMMOPNS is Shareware.  Print out REGISTER.FRM for information on how to pay.
  22.   ____
  23.  /  o \/| The Babble Underground      Call for the latest versions of
  24. |___,   | (707) 575-0636              {COMMO}, COMMOPNS, and other {COMMO}
  25.  \____/\| USRobotics Dual Standard    Utilities.
  26.  ────────────────────────────────────────────────────────────────────────────   {:PNSEdit} {MACRO PNS Edit}
  27.                                [E] to Edit
  28.  ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
  29.  ZMODEM BAT {:pnszup} * Auto Zmodem Upload, add "aut=pnszup,^xB01" to COMMO.SET
  30.             {:PNSz}                              * Label menu GOTOs
  31.             {:CF1}                               * HotKey (Control-F1)
  32.             {CALL PNS}                           * execute COMMOPNS
  33.             {EXEC-AW DSZ port %_port sz @%pnsf}  * Protocol Driver
  34.             {GOTO PNSDone}                       * All done clean/up exit
  35.  
  36.  YMODEM BAT {:PNSyb} {:CF2} {CALL PNS} {EXEC-AW DSZ port %_port sb -k @%pnsf} {GOTO PNSDone}
  37.  MPT        {:PNSp}  {:CF3} {CALL PNS} {EXEC-AW MPT P%p s @%pnsf}             {GOTO PNSDone}
  38.  XMODEM 1K  {:PNSxk} {:CF4} {CALL PNS} {CALL PNSGetName} {SXMO-KAW %PNSUpf}   {GOTO PNSDone}
  39.  XMODEM CRC {:PNSx}  {:CF5} {CALL PNS} {CALL PNSGetName} {SXMO-AW %PNSUpf}    {GOTO PNSDone}
  40.  HSLINK BAT {:PNSh}  {:CF6} {CALL PNS1} {exec HSLINK -p%_por @%pnsf -u%dldir} {GOTO PNSDone}
  41.  ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
  42. * The program COMMOPNS.EXE, DSZ.COM(or DSZ.EXE), and MPT.EXE must be in your *
  43. * DOS PATH.  The '@' and drive specifier MUST be included, OR DSZ won't work.*
  44.  ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─     PNS Filename Setup
  45. {:PNS1} {SETV pns_hslink,true}
  46. {:PNS}  {SETV pnsf,C:\FILE.LST}
  47.                    ^^^^^^^^^^^
  48.                    Configurable, file to put tagged file list.
  49.  
  50.         {EXEC COMMOPNS %pnsf -ON -D%uldir -S%_speed}
  51.             * The -ON Sort files by filename.
  52.             * The -D option to specify in which directory to start.
  53.             * The -S option to specify the bps rate.
  54.  
  55.         {COMP pns_hslink,true}  {IFCO PNSReturn}
  56.         {IFEX %pnsf,,PNSD}
  57. {:PNSReturn}
  58.         {SETV pns_hslink}
  59.         {RETURN}
  60.  
  61. {:PNSGetName}  * For internal Xmodem protocols
  62.         {ROPEN %pnsf,PNSG}
  63.         {READ %PNSUpf}
  64.         {RCLOSE}
  65. {:PNSG} {RETURN}
  66.  
  67. {:PNSDone}
  68.         {EXEC ERASE %pnsf}
  69. {:PNSD} {SETV pnsf}
  70.         {SETV PNSUpf}
  71.         {}
  72.  
  73. {:PNSRegister}
  74.         {SPOC N} {CLEAR} {DISP 2,1,6a,COMMOPNS Registration}
  75.         {DISP 4,1,07,Use underlines instead of spaces in your name.  (e.g. Jane_Doe)}
  76.         {DISP 5,1,07,Registration Name: }  {GETS PNSname,30,PNSR20}
  77.         {DISP 6,1,07,Serial Number: }      {GETS PNSserial,4,PNSR20}
  78.         {DISP 7,1,07,Activation Code: }    {GETS PNScode,5,PNSR20}
  79.         {EXEC-W COMMOPNS -R%PNSserial %PNScode %PNSname}
  80.         {SETV PNSSerial}  {SETV PNScode}  {SETV PNSname}
  81. {:PNSR20}
  82.         {CLEAR}
  83.         {MACRO}
  84.  
  85.  * * * END OF PNS MACROS
  86.  ────────────────────────────────────────────────────────────────────────────
  87.